home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / CUJ9209.ARJ / 1009031A < prev    next >
Text File  |  1991-12-19  |  202b  |  12 lines

  1. swap = 1;
  2. while (swap == 1) {
  3.   swap = 0;
  4.   for (i = 0; i < n - 1; i++) {
  5.     if (x[i] > x[i + 1]) {
  6.       tmp = x[i];
  7.       x[i] = x[i + 1];
  8.       x[i + 1] = tmp;
  9.       swap = 1;
  10.     }
  11.   }
  12. }